home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1993…ch: Other People's Memory / ADC Developer CD (1993-03) (''Other People's Memory'')_iso / Dev.CD Mar 93.iso / Development Platforms / Apple II / Essentials / MPW IIGS Interfaces / PIIGSIncludes / QDAux.p < prev    next >
Encoding:
Text File  |  1991-10-28  |  3.9 KB  |  162 lines  |  [TEXT/MPS ]

  1. {********************************************
  2. ; File: QDAux.p
  3. ;
  4. ;
  5. ; Copyright Apple Computer, Inc. 1986-91
  6. ; All Rights Reserved
  7. ;
  8. ********************************************}
  9.  
  10. UNIT QDAUX;
  11. INTERFACE
  12. USES TYPES,QUICKDRAW;
  13. CONST
  14.  
  15.  
  16. {
  17.     PicInfo - The following picture
  18.     opcodes are for reference only!!
  19. }
  20.  
  21. frameVerb = $00;
  22. picNop = $00;
  23. drawCharVerb = $00;
  24. paintVerb = $01;
  25. picClipRgn = $01;
  26. drawTextVerb  = $01;
  27. eraseVerb = $02;
  28. picBkPat = $02;
  29. drawCStrVerb = $02;
  30. invertVerb = $03;
  31. picTxFont = $03;
  32. fillVerb = $04;
  33. picTxFace = $04;
  34. picTxMode = $05;
  35. picSpExtra = $06;
  36. picPnSize = $07;
  37. picPnMode = $08;
  38. picPnPat = $09;
  39. picThePat = $0A;
  40. picFillPat = $0A;  { Please use picThePat }
  41. picOvSize = $0B;
  42. picOrigin = $0C;
  43. picTxSize = $0D;
  44. picFGColor = $0E;
  45. picBGColor = $0F;
  46. picTxRatio = $10;
  47. picVersion = $11;
  48. picChExtra = $12;
  49. picPnMask = $13;
  50. picArcRot = $14;
  51. picFontFlags = $15;
  52. lineNoun = $20;
  53. picLine = $20;
  54. picLineFrom = $21;
  55. picShortL = $22;
  56. picShortLine = $22;
  57. picShortLFrom = $23;
  58. picLongText = $28;
  59. picDHText = $29;
  60. picDVText = $2A;
  61. picDVDHText = $2B;
  62. rectNoun = $30;
  63. rRectNoun = $40;
  64. ovalNoun = $50;
  65. arcNoun = $60;
  66. polyNoun = $70;
  67. rgnNoun = $80;
  68. mapNoun = $90;
  69. picBitsRect = $90;
  70. picBitsRgn = $91;
  71. picPBitsRect = $98;
  72. picPBitsRgn = $99;
  73. picShortComment = $A0;
  74. picLongComment = $A1;
  75. picEnd = $FF;
  76.  
  77. { SeedFill/CalcMask Masks }
  78. resMode640PMask = $00;
  79. resMode640DMask = $01;
  80. resMode320Mask = $02;
  81. destModeCopyMask = $0000;
  82. destModeLeaveMask = $1000;
  83. destModeOnesMask = $2000;
  84. destModeClrToZeros = $2000;
  85. destModeZerosMask = $3000;
  86. destModeClrToOnes = $3000;
  87.  
  88. { Error Codes }
  89. badRectSize = $1211;
  90. destModeError = $1212;
  91. badPictureOpcode = $121F;
  92. badGetSysIconInput = $1230;
  93.  
  94. { GetSysIcon constants }
  95. fUseOpenFolders = $0004;
  96. getFileIcon = $0000;
  97. getDeviceIcon = $0001;
  98. getMiscIcon = $0002;
  99. desktopSysIcon = $0000;
  100. padlockSysIcon = $0001;
  101. upArrowSysIcon = $0002;
  102. downArrowSysIcon = $0003;
  103. boxDownArrowSysIcon = $0004;
  104.  
  105. { WhooshRect constants }
  106. whooshOut = $80000000;
  107. whooshIn = 0;
  108. fLocalCoordinates = $40000000;
  109. fSilent = $20000000;
  110.  
  111. { Other Constants }
  112. fTextJust = $0008;
  113.  
  114. TYPE
  115. QDIconRecordHndl = ^QDIconRecordPtr;
  116. QDIconRecordPtr = ^QDIconRecord;
  117. QDIconRecord = RECORD
  118.     iconType : Integer;
  119.     iconSize : Integer;
  120.     iconHeight : Integer;
  121.     iconWidth : Integer;
  122.     iconImage : PACKED ARRAY[1..1] OF Byte;
  123.     iconMask : PACKED ARRAY[1..1] OF Byte;
  124. END;
  125. PicHndl = ^PicPtr;
  126. PicPtr = ^Picture;
  127. Picture = RECORD
  128.     picSCB : Integer;
  129.     picFrame : Rect;
  130.     pVersion : Integer; { Followed by picture opcodes  }
  131. END;
  132. LeakTablePtr = ^LeakTable;
  133. LeakTable = RECORD
  134.     leakCount : Integer;
  135.     leakColors : ARRAY[1..16] OF Integer;
  136. END;
  137. PROCEDURE CalcMask ( srcLocInfoPtr:LocInfo; srcRect:Rect; dstLocInfoPtr:LocInfo; dstRect:Rect; resMode:Integer; aPatternPtr:PatternPtr; leakTblPtr:LeakTable);
  138. PROCEDURE ClosePicture;
  139. PROCEDURE CopyPixels ( srcLocPtr:LocInfo; destLocPtr:LocInfo; srcRect:Rect; destRect:Rect; xferMode:Integer; makeRgn:RegionHndl);
  140. PROCEDURE DrawIcon ( iconPtr:QDIconRecord; displayMode:Integer; xPos:Integer; yPos:Integer);
  141. PROCEDURE DrawPicture ( picHandle:PicHndl; destRect:Rect);
  142. PROCEDURE KillPicture ( pichandle:PicHndl);
  143. FUNCTION OpenPicture ( picFrame:Rect) : PicHndl ;
  144. PROCEDURE PicComment ( kind:Integer; dataSize:Integer; dataHandle:Handle);
  145. PROCEDURE QDAuxBootInit;
  146. PROCEDURE QDAuxReset;
  147. PROCEDURE QDAuxShutDown;
  148. PROCEDURE QDAuxStartUp;
  149. FUNCTION QDAuxStatus  : Boolean ;
  150. FUNCTION QDAuxVersion  : Integer ;
  151. PROCEDURE SeedFill ( srcLocInfoPtr:LocInfo; srcRect:Rect; dstLocInfoPtr:LocInfo; dstRect:Rect; seedH:Integer; seedV:Integer; resMode:Integer; aPatternPtr:PatternPtr; leakTblPtr:LeakTable);
  152. PROCEDURE SpecialRect ( rectPtr:Rect; frameColor:Integer; fillColor:Integer);
  153. PROCEDURE WaitCursor;
  154.  
  155. FUNCTION GetSysIcon(flags, value:integer; auxValue:longint): QDIconRecordPtr;
  156. FUNCTION PixelMap2Rgn(loc:LocInfoPtr; bitsPerPixel, colorsToInclude:integer): RegionHndl;
  157. PROCEDURE IBeamCursor;
  158. PROCEDURE WhooshRect(flags:longint; smallRect, bigRect:Rect);
  159.  
  160. IMPLEMENTATION
  161. END.
  162.